home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS in a Box 7
/
BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso
/
Files
/
Hyper
/
C-Cl
/
ClientListII.cpt
/
Client List II
/
card_10369.txt
< prev
next >
Wrap
Text File
|
1987-11-29
|
17KB
|
863 lines
-- card: 10369 from stack: in
-- bmap block id: 0
-- flags: 4000
-- background id: 2405
-- name: Modem Set-up
-- part 6 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=311 top=24 right=48 bottom=335
-- title width / last selected line: 0
-- icon id / first selected line: 19678 / 19678
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Help
----- HyperTalk script -----
on mouseUp
hide button help
show card field 1
show button OK
end mouseUp
-- part 9 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=11 top=30 right=52 bottom=111
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Who?
----- HyperTalk script -----
on mouseUp
Visual effect venetian blinds
go to card id 10684
end mouseUp
-- part 12 (button)
-- low flags: 00
-- high flags: 8002
-- rect: left=12 top=96 right=119 bottom=122
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Data Bits
-- part 13 (button)
-- low flags: 00
-- high flags: 8002
-- rect: left=12 top=127 right=150 bottom=122
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Stop Bits
-- part 14 (button)
-- low flags: 00
-- high flags: 8002
-- rect: left=13 top=159 right=182 bottom=123
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Parity
-- part 15 (button)
-- low flags: 00
-- high flags: 8002
-- rect: left=13 top=191 right=214 bottom=123
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Duplex
-- part 19 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=120 top=96 right=119 bottom=174
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: data
----- HyperTalk script -----
on mouseUp
answer "Select by clicking on number at right" with "OK"
if it is "OK"
then exit mouseup
end mouseUp
-- part 20 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=120 top=127 right=150 bottom=173
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: stop
-- part 21 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=121 top=159 right=182 bottom=174
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: parity
-- part 22 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=121 top=191 right=214 bottom=174
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: mode
-- part 25 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=197 top=24 right=47 bottom=307
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Modem Set-up
----- HyperTalk script -----
on mouseUp
hide button "Modem set-up"
show card field "one"
end mouseUp
-- part 28 (button)
-- low flags: 00
-- high flags: 8002
-- rect: left=11 top=64 right=87 bottom=121
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Baud
-- part 29 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=119 top=64 right=87 bottom=174
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Baud
----- HyperTalk script -----
on mouseUp
answer "Select by clicking on number at right" with "OK"
if it is "OK"
then exit mouseup
end mouseUp
-- part 32 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=173 top=64 right=87 bottom=346
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name:
-- part 30 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=129 top=30 right=53 bottom=170
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Set
----- HyperTalk script -----
on mouseUp
global mode,string,len,baud,stop,parity,data,ds
put card field "baud" into baud
put card field "data" into data
put card field "parity" into parity
put card field "stop" into stop
put card field "mode" into mode
go to background 1
end mouseUp
-- part 38 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=173 top=96 right=119 bottom=346
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 39 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=173 top=127 right=150 bottom=346
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 40 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=173 top=159 right=182 bottom=346
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 41 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=173 top=191 right=214 bottom=346
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
-- part 43 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=176 top=64 right=87 bottom=202
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 300
----- HyperTalk script -----
on mouseUp
global baud
put "300" into baud
put "300" into card field "baud"
end mouseUp
-- part 45 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=203 top=64 right=87 bottom=229
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 1200
----- HyperTalk script -----
on mouseUp
global baud
put "1200" into baud
put "1200" into card field "baud"
end mouseUp
-- part 46 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=230 top=64 right=87 bottom=256
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 2400
----- HyperTalk script -----
on mouseUp
global baud
put "2400" into baud
put "2400" into card field "baud"
end mouseUp
-- part 47 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=259 top=64 right=87 bottom=285
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 4800
----- HyperTalk script -----
on mouseUp
global baud
put "4800" into baud
put "4800" into card field "baud"
end mouseUp
-- part 48 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=287 top=64 right=87 bottom=313
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 7200
----- HyperTalk script -----
on mouseUp
global baud
put "7200" into baud
put "7200" into card field "baud"
end mouseUp
-- part 49 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=315 top=64 right=87 bottom=341
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 9600
----- HyperTalk script -----
on mouseUp
global baud
put "9600" into baud
put "9600" into card field "baud"
end mouseUp
-- part 50 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=177 top=96 right=119 bottom=194
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 5
----- HyperTalk script -----
on mouseUp
global data
put "5" into data
put "5" into card field "data"
end mouseUp
-- part 51 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=195 top=96 right=119 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 6
----- HyperTalk script -----
on mouseUp
global data
put "6" into data
put "6" into card field "data"
end mouseUp
-- part 53 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=211 top=96 right=119 bottom=225
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 7
----- HyperTalk script -----
on mouseUp
global data
put "7" into data
put "7" into card field "data"
end mouseUp
-- part 54 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=226 top=96 right=119 bottom=241
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 8
----- HyperTalk script -----
on mouseUp
global data
put "8" into data
put "8" into card field "data"
end mouseUp
-- part 55 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=179 top=127 right=150 bottom=193
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 1
----- HyperTalk script -----
on mouseUp
global stop
put "10" into stop
put "10" into card field "stop"
put "1" into card field "stopcover"
end mouseUp
-- part 56 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=221 top=127 right=150 bottom=235
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 2
----- HyperTalk script -----
on mouseUp
global stop
put "20" into stop
put "20" into card field "stop"
put "2" into card field "stopcover"
end mouseUp
-- part 57 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=195 top=127 right=150 bottom=221
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 1.5
----- HyperTalk script -----
on mouseUp
global stop
put "15" into stop
put "15" into card field "stop"
put "1.5" into card field "stopcover"
end mouseUp
-- part 58 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=182 top=159 right=182 bottom=210
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: none
----- HyperTalk script -----
on mouseUp
global parity
put "0" into parity
put "0" into card field "parity"
put "none" into card field "paritycover"
end mouseUp
-- part 59 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=218 top=159 right=182 bottom=247
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: even
----- HyperTalk script -----
on mouseUp
global parity
put "2" into parity
put "2" into card field "parity"
put "even" into card field "paritycover"
end mouseUp
-- part 60 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=252 top=159 right=182 bottom=279
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: odd
----- HyperTalk script -----
on mouseUp
global parity
put "1" into parity
put "1" into card field "parity"
put "odd" into card field "paritycover"
end mouseUp
-- part 61 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=180 top=191 right=214 bottom=207
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: full
----- HyperTalk script -----
on mouseUp
global mode
put "0" into mode
put "0" into card field "mode"
put "full" into card field "modecover"
end mouseUp
-- part 62 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=212 top=191 right=214 bottom=238
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: half
----- HyperTalk script -----
on mouseUp
global mode
put "1" into mode
put "1" into card field "mode"
put "half" into card field "modecover"
end mouseUp
-- part 63 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=246 top=191 right=214 bottom=274
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: echo
----- HyperTalk script -----
on mouseUp
global mode
put "2" into mode
put "2" into card field "mode"
put "echo" into card field "modecover"
end mouseUp
-- part 65 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=120 top=127 right=150 bottom=174
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: stopcover
----- HyperTalk script -----
on mouseUp
answer "Select by clicking on number at right" with "OK"
if it is "OK"
then exit mouseup
end mouseUp
-- part 66 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=121 top=159 right=182 bottom=174
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: paritycover
----- HyperTalk script -----
on mouseUp
answer "Select by clicking on number at right" with "OK"
if it is "OK"
then exit mouseup
end mouseUp
-- part 67 (field)
-- low flags: 01
-- high flags: 2002
-- rect: left=121 top=191 right=214 bottom=174
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: modecover
----- HyperTalk script -----
on mouseUp
answer "Select by clicking on number at right" with "OK"
if it is "OK"
then exit mouseup
end mouseUp
-- part 73 (field)
-- low flags: 81
-- high flags: 2004
-- rect: left=173 top=18 right=88 bottom=375
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: one
----- HyperTalk script -----
on mouseup
show button "Modem set-up"
hide card field "one"
end mouseup
-- part contents for card part 29
----- text -----
1200
-- part contents for card part 32
----- text -----
300,1200,2400,4800,7200,9600
-- part contents for card part 38
----- text -----
5, 6, 7, 8
-- part contents for card part 39
----- text -----
1, 1.5, 2
-- part contents for card part 40
----- text -----
none, even, odd
-- part contents for card part 41
----- text -----
full, half, echo
-- part contents for card part 19
----- text -----
8
-- part contents for card part 20
----- text -----
10
-- part contents for card part 65
----- text -----
1
-- part contents for card part 21
----- text -----
0
-- part contents for card part 66
----- text -----
none
-- part contents for card part 22
----- text -----
0
-- part contents for card part 67
----- text -----
full
-- part contents for card part 73
----- text -----
Change settings by clicking on new values, then press "Set" to change values.